scan_CH_VS Function

private elemental function scan_CH_VS(string, set, back) result(i)

Scan a character string for occurrences of characters in a varying-string set

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: string
type(varying_string), intent(in) :: set
logical, intent(in), optional :: back

Return Value integer


Source Code

  elemental function scan_CH_VS (string, set, back) result (i)

    character(LEN=*), intent(in)     :: string
    type(varying_string), intent(in) :: set
    logical, intent(in), optional    :: back
    integer                          :: i


    i = SCAN(string, char(set), back)

! Finish

    return

  end function scan_CH_VS